SET CONSOLE OFF   Turned back on by REPORT | LABEL FORM TO ...

  Clipper Version  1.03 dtd 09/15/90.

  Problem Statement

  When SET CONSOLE OFF is used prior to a REPORT | LABEL FORM <formname>
  TO PRINT | FILE, it appears to be ignored.

  Cause

  Syntactical ommissions in documentation. Note: FRMRUN.PRG | LBLRUN.PRG
  programming uses the presence | absence of a NOCONSOLE parameter to
  SET CONSOLE accordingly.

  Work Around(s)

  1) Change documentation to reflect addition of this parameter:
    REPORT | LABEL FORM <xcReport> [TO PRINTER] [TO FILE <xcFile>][<scope>]
    [WHILE <lCondition>] [FOR <lCondition>][PLAIN | HEADING <cHeading>]
    [NOEJECT] [SUMMARY] [NOCONSOLE]

  2) Use NOCONSOLE in Clipper 5.0 programs.

  3) Change the following lines:

     FRMRUN.PRG:

       *  lConsoleOn := SET( _SET_CONSOLE, !lNoConsole )
       lConsoleOn := IF( !lNoConsole, SET(_SET_CONSOLE),;
                        SET(_SET_CONSOLE, .F.) )
     LBLRUN.PRG
       *  LOCAL lConsoleOn := .T.          // CONSOLE status
       LOCAL lConsoleOn                 // CONSOLE status

       *  IF lConsole == NIL
       *   lConsole := .T.
       *  ENDIF

       *  IF lConsole              // To the screen
       *   lConsoleOn := SET( _SET_CONSOLE, lConsole )
       *  ENDIF
       lConsoleOn := IF( !lNoConsole, SET(_SET_CONSOLE),;
                        SET(_SET_CONSOLE, .F.) )

     Compile and link these programs with your program when these
     functions are required.